CommonEvent 2347
Name = "誘惑：黒薔薇"

  999([2347])
  ConditionalBranch([0, 26, 1])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  Script(["$game_troop.lose_event_id = 3347"])
  ControlVariables([26, 26, 0, 3, 3, 1, 4])
  ControlVariables([26, 26, 4, 0, 10])
  ShowTextAttributes(["sanki2_fc1", 2, 0, 2])
  ShowText(["\\n<Black Rose>What a strong human...\nI should give you a sweet reward."])
  ShowText([""])
  ShowText([""])
  ShowTextAttributes(["sanki2_fc1", 1, 0, 2])
  ShowText(["\\n<Black Rose>That's why I shall embrace you with my mantle.\nYou will be able to ejaculate in ecstasy as I sweetly wrap your entire body..."])
  ShowText([""])
  ShowText([""])
  ControlSwitches([98, 98, 0])
  ControlSwitches([96, 96, 0])
  ShowChoices([["Ignore her", "Give in to temptation"], 1])
  When([0, "無視する"])
    ShowTextAttributes(["", 0, 0, 2])
    ShowText(["Luka resists her temptation!"])
    CallCommonEvent([1999])
    ExitEventProcessing([])
    Empty([])

  When([1, "誘惑に乗る"])
    Empty([])

  ChoicesEnd([])
  ShowTextAttributes(["sanki2_fc1", 0, 0, 2])
  ShowText(["\\n<Black Rose>Then I'll wrap you in my mantle.\nImmerse yourself in the ecstasy of a vampire's absorbing mantle..."])
  ShowText([""])
  ShowText([""])
  ControlVariables([26, 26, 3, 0, 4])
  PlaySE(["RPG::SE(@name=\"mon_ero_makituki3\", @pitch=100, @volume=100)"])
  ChangeHP([0, 1, 1, 1, 26, true])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Black Rose's mantle wraps around Luka's body!\nA melting ecstasy wraps around his entire body!\\D"])
  ShowText(["Luka takes \\V[26] damage!"])
  ShowText([""])
  ControlVariables([27, 27, 0, 3, 3, 1, 2])
  ConditionalBranch([1, 27, 0, 0, 0])
    JumpToLabel(["射精1"])
    Empty([])

  BranchEnd([])
  ShowTextAttributes(["sanki2_fc1", 1, 0, 2])
  ShowText(["\\n<Black Rose>Fufu, you've instantly fallen into a trance.\nI'll squeeze out your semen like this..."])
  ShowText([""])
  ShowText([""])
  PlaySE(["RPG::SE(@name=\"mon_ero_chupa6\", @pitch=100, @volume=100)"])
  ChangeHP([0, 1, 1, 1, 26, true])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Black Rose's mantle also coils around Luka's penis!\nA sweet, sucking stimulation gives him pleasure!\\D"])
  ShowText(["Luka takes \\V[26] damage!"])
  ShowText([""])
  ControlVariables([27, 27, 0, 3, 3, 1, 2])
  ConditionalBranch([1, 27, 0, 0, 0])
    JumpToLabel(["射精1"])
    Empty([])

  BranchEnd([])
  ShowTextAttributes(["sanki2_fc1", 1, 0, 2])
  ShowText(["\\n<Black Rose>Now, you must come.\nDedicate your semen to my mantle..."])
  ShowText([""])
  ShowText([""])
  PlaySE(["RPG::SE(@name=\"mon_ero_chupa6\", @pitch=100, @volume=100)"])
  ChangeHP([0, 1, 1, 1, 26, true])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Black Rose's mantle sweetly melts Luka's penis!\nHis entire body is engulfed in a feeling of ecstasy, encouraging a feeling of release!\\D"])
  ShowText(["Luka takes \\V[26] damage!"])
  ShowText([""])
  ControlVariables([27, 27, 0, 3, 3, 1, 2])
  ConditionalBranch([1, 27, 0, 0, 0])
    JumpToLabel(["射精1"])
    Empty([])

  BranchEnd([])
  Label(["射精1"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["No, I'm going to come... Aaaah..."])
  CallCommonEvent([104])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["While wrapped in Black Rose's mantle, I come.\nMy semen scatters all over her devilish mantle."])
  ShowText([""])
  ShowTextAttributes(["sanki2_fc1", 1, 0, 2])
  ShowText(["\\n<Black Rose>Fufu, you were finished easily.\nA vampire's mantle is indeed pleasurable, isn't it...?"])
  ShowText([""])
  ShowText([""])
  CallCommonEvent([2000])
  ExitEventProcessing([])
  Empty([])
